home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1993 / MacHack 1993.toast / MacHack™ 1987-1992 / MacHack™ '90 / Other Stuff / Demos ƒ / Demo AppMaker / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpC_1012_Palette < prev    next >
Encoding:
Text File  |  1990-03-23  |  665 b   |  33 lines
  1. %case window field%
  2.     short            %fieldname%;
  3.     ControlHandle    %HandleName%;
  4. %case create%
  5.     cur->%HandleName% = GetNewControl (%cntlID%, newWindow);
  6. %case dispose%
  7. %case mousein%
  8. %case update%
  9. %case activate%
  10. %case track%
  11.     if (whichControl == cur->%HandleName%) {
  12.         TrackPalette (cur->%HandleName%, where, &cur->%FieldName%);
  13.     }
  14. %case itemNr%
  15.     %DefineItem%
  16. %case dialog field%
  17.     short%        %%fieldname%;
  18.     %Enable?%
  19. %case init field%
  20.     info->%fieldname% = 1;
  21.     %Enable?%
  22. %case auxiliary%
  23. %case filter%
  24. %case set%
  25.     SetControl (%itemname%, info->%fieldname%);
  26. %case enable%
  27.     %Enable?%
  28. %case hit%
  29.     case %itemname%:
  30.             DoPalette (itemNr, &info->%fieldname%);
  31.         break;
  32. %case finish%
  33.